home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 6
/
64er_Magazin_Sonderheft_06_86-06_1986_Markt__Technik_de_Disk_1_of_3_Side_A.d64
/
schraffur i
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
236b
|
18 lines
0 rem schraffur i
10 (NULL)1:(NULL)1:(NULL)1:(NULL)
20 (NULL):(NULL)1,0
30 (NULL)1
40 (NULL)200,80,100,40
50 (NULL)150,100,80,90
60 (NULL)2
70 (NULL)
80 (NULL)1
90 (NULL)160,90
100 (NULL)3
110 (NULL)
120 fori=0to199step3:(NULL)0,i,i*1.6,0:(NULL)319,199-i,319-i*1.6,199:next
130 (NULL)
140 (NULL)1
150 (NULL)1
160 fori=0to10000:next:(NULL)0